﻿Imports System

Public Class Exceptions

    Public Class PageExistsException
        Inherits System.ApplicationException
        Public Sub New()
        End Sub
        ' Creates a Sub New for the exception that allows you to set the
        ' message property when thrown.
        Public Sub New(ByVal Message As String)
            MyBase.New(Message)
        End Sub
        ' Creates a Sub New that can be used when you also want to include
        ' the inner exception.
        Public Sub New(ByVal Message As String, ByVal Inner As Exception)
            MyBase.New(Message)
        End Sub
    End Class

End Class
